﻿Imports System.Collections.Generic
Imports System.Linq
Imports System.Text


''' <summary>
''' Clase que define la entidad de negocio Departamento
''' </summary>
''' <remarks></remarks>
Public Class cDepartamento

    Private _iDep_Codigo As Integer
    Private _sDep_Descrip As String
    Private _iDVH As Int32


    Public Property Dep_Codigo() As Integer
        Get
            Return _iDep_Codigo
        End Get
        Set(value As Integer)
            _iDep_Codigo = value
        End Set
    End Property

    Public Property Dep_Descrip() As String
        Get
            Return _sDep_Descrip
        End Get
        Set(value As String)
            _sDep_Descrip = value
        End Set
    End Property

    Public Property DVH() As Int32
        Get
            Return _iDVH
        End Get
        Set(value As Int32)
            _iDVH = value
        End Set
    End Property



    Public Sub New()
    End Sub

    Public Sub New(iDep_Codigo As Integer, sDep_Descrip As String)
        Me._iDep_Codigo = iDep_Codigo
        Me._sDep_Descrip = sDep_Descrip
    End Sub

    Public Function Validar() As Boolean
        Dim bResultado As Boolean = True


        bResultado = bResultado And (Me._sDep_Descrip <> "")


        Return bResultado

    End Function

End Class